Copy specified MESSAGE(s) to another FOLDER without deleting them.
Default is the displayed message. If (optional) prefix argument is
provided, then prompt for the message sequence." (byte-code "ë¡ä┴┬├\"─┼╞├#Eç" [current-prefix-arg mh-read-seq-default "Copy" t mh-prompt-for-folder "Copy to" ""] 6)])
Process outstanding delete and refile requests." nil])
(fset 'mh-extract-rejected-mail #[(msg) "┴ ┬├─!╞# ebê╩╞╠#½Å═uêe`|ê╬e╧╞#ê¬ä╨╤!êebê╥╞!ê╙╘ ╒╓!╒╫!╒╪!╞ë&\n+ç" [mh-current-folder current-window-configuration mh-read-draft "extraction" mh-msg-filename msg nil draft config from-folder re-search-forward mh-rejected-letter-start t 1 mh-clean-msg-header "^Date:\\|^Received:\\|^Message-Id:\\|^From:\\|^Sender:" message "Does not appear to be a rejected letter." set-buffer-modified-p mh-compose-and-send-mail "" mh-get-field "To" "From" "cc"] 11 "\
Extract a letter returned by the mail system and make it resendable.
Default is the displayed message." (byte-code "└┴!Cç" [mh-get-msg-num t] 2)])
(fset 'mh-forward #[(prefix-provided msg-or-seq to cc) "┬ ─┼\"╚!½à╔╩!½¥╦╠═$ê╧╨╤#╥╙╒$ê╫╪!ê¬å╧╨╪#ebê┌█!ê▄yê`d}êè▌▐!)αß\"\"è▌π!)$\"½ëσ\"SO~êè╥πµτ$#\"ê)Φ ê)½ïΩδ!∞╤#ê¬çΩ∞╤#êφ╨ .∩&\n.ç" [mh-current-folder folder current-window-configuration config expand-file-name "draft" mh-user-path draft-name file-exists-p y-or-n-p "The file 'draft' exists. Discard it? " mh-exec-cmd "forw" "-build" msg-or-seq mh-read-draft "" t mh-insert-fields "To:" to "Cc:" cc set-buffer-modified-p nil draft re-search-forward "^------- Forwarded Message" -1 mh-get-field "From:" subject string-match "<" trim "Subject:" forw-subject 0 format "[%s: %s]" delete-other-windows prefix-provided mh-add-msgs-to-seq mh-seq-to-msgs forwarded mh-compose-and-send-mail mh-note-forw "Forwarded:"] 11 "\
Forward MESSAGE(s) (default: displayed message).
If (optional) prefix argument provided, then prompt for the message sequence." (byte-code "ë½å┴┬├\"¬â─├!┼╞!┼╟!Fç" [current-prefix-arg mh-read-seq-default "Forward" t mh-get-msg-num read-string "To: " "Cc: "] 5)])
(fset 'mh-goto-msg #[(number &optional no-error-if-no-message dont-show) "└┴!`┬!ë½åU¼¼½ìW½ç╟┴╚#¼¢½ìV½ç╔┴╚#¼èebê╟┴╚#½Ä╩yê¼ä╠!ê╚¬ìbê¼à╬╧\"ê┴+ç" [mh-get-msg-num nil mh-msg-search-pat number msg-pattern starting-place cur-msg re-search-forward t re-search-backward 0 dont-show mh-maybe-show no-error-if-no-message error "No message %d"] 5 "\
Position the cursor at message NUMBER.
Non-nil second argument means do not signal an error if message does not exist.
Non-nil third argument means not to show the message.
Return non-nil if cursor is at message." "NMessage number? "])
Optional prefix argument specifies an alternate maildrop from the default.
If this is given, mail is incorporated into the current folder, rather
than +inbox. Run mh-inc-folder-hook after incorporating new mail." (byte-code "¡å┴┬├\"!Cç" [current-prefix-arg expand-file-name read-file-name "inc mail from file: " mh-user-path] 4)])
(fset 'mh-kill-folder #[nil "¼ê┴┬├\"!½¥╞╟!ê╚╔\"ê╩!ê╦╠\"ê╞═!ê╬!)ç╦╧!ç" [mh-do-not-confirm yes-or-no-p format "Remove folder %s? " mh-current-folder folder mh-set-folder-modified-p t mh-exec-cmd-daemon "rmf" mh-remove-folder-from-folder-list message "Folder %s removed" nil kill-buffer "Folder not removed"] 4 "\
Print MESSAGE(s) (default: displayed message) on a line printer.
If (optional) prefix argument provided, then prompt for the message sequence." (byte-code "ë½è┴┬├─┼\"!!¬â╞┼!Dç" [current-prefix-arg reverse mh-seq-to-msgs mh-read-seq-default "Print" t mh-get-msg-num] 6)])
Add MESSAGE(s) (default: displayed message) to SEQUENCE.
If (optional) prefix argument provided, then prompt for the message sequence." (byte-code "ë½ê┴┬├─\"!¬â┼─!┬╞╟\"Eç" [current-prefix-arg mh-seq-to-msgs mh-read-seq-default "Add messages from" t mh-get-msg-num "Add to" nil] 5)])
Depending on how your copy of MH was compiled, you may need to change the
setting of the variable mh-redist-full-contents. See its documentation." (byte-code "└┴!└┬!├─!Eç" [read-string "Redist-To: " "Redist-Cc: " mh-get-msg-num t] 4)])
Append MESSAGE to the end of a FILE." (byte-code "└┴!\n@├=½å─\nA!¬ü╟╚╔╩\"#)Dç" [mh-get-msg-num t mh-last-destination write file-name-directory default-directory default-dir read-file-name "Save message in file: " expand-file-name "mail.out"] 7)])
Insert a message from any folder into the current letter.
Removes the message's headers using mh-invisible-headers.
Prefixes each non-blank line with mh-ins-buf-prefix (default \">> \").
If (optional) prefix argument provided, do not indent and do not delete
headers.
Leaves the mark before the letter and point after it." (byte-code "┴┬─#┼╞╟½ç╞╔\"¬ü╩\"!Eç" [current-prefix-arg mh-prompt-for-folder "Message from" mh-sent-from-folder nil read-input format "Message number%s: " mh-sent-from-msg " [%d]" ""] 8)])
(fset 'mh-yank-cur-msg #[nil "½╪ ½╒`pqê½à┼!êqê╟ ½å`╟ {¬¥╔=½ïè╩╦!ê`)d{¬î½àed{¬â`d{\nqêë}ê═ êcê╬!ê╨cê~+ç╤╥!ç" [mh-sent-from-folder mh-sent-from-msg to-buffer to-point mh-delete-yanked-msg-window delete-windows-on mh-show-buffer mark mh-yank-from-start-of-msg body mh-goto-header-end 1 mh-ins-str push-mark mh-insert-prefix-string mh-ins-buf-prefix "\n" error "There is no current message"] 2 "\
Insert the current message into the draft buffer.
Prefix each non-blank line in the message with the string in
mh-ins-buf-prefix. If a region is set in the message's buffer, then
only the region will be inserted. Otherwise, the entire message will
be inserted if mh-yank-from-start-of-msg is non-nil. If this variable
is nil, the portion of the message following the point will be yanked.
If mh-delete-yanked-msg-window is non-nil, any window displaying the